home *** CD-ROM | disk | FTP | other *** search
/ Aminet 30 / Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso / Aminet / dev / mui / bcc_src.lha / Parser / test / MyApplication_new.bc < prev    next >
Encoding:
Text File  |  1996-12-25  |  643 b   |  24 lines
  1. #include "MyApplication.h"
  2. #include "MyWindow.h"
  3.  
  4. Method MyApplication::MyApplication():
  5.     MUIA_Application_Author, "Rafaî Mantiuk",
  6.     MUIA_Application_Base, "KOCH",
  7.     MUIA_Application_Title, "Koch",
  8.     MUIA_Application_Version, "$VER: Koch 1.0 (1.1.97)",
  9.     MUIA_Application_Copyright, "Copyright (c)1996, Rafaî Mantiuk",
  10.     MUIA_Application_Description, "Koch's fractals.",
  11.     MUIA_Application_HelpFile, "Koch.guide",
  12.  
  13.     SubWindow, data->win = MyWindowObject,
  14.     End
  15. {
  16.  
  17.     DoMethod( data->win, 
  18.         MUIM_Notify,MUIA_Window_CloseRequest, TRUE,
  19.         obj, 2, MUIM_Application_ReturnID,MUIV_Application_ReturnID_Quit);
  20.  
  21.     set( data->win, MUIA_Window_Open, TRUE );
  22.  
  23. }
  24.